home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows 6-Pak - Disc 5
/
Windows 6-Pak (InfoMagic) (Disc 5) (1999).ISO
/
Misc-Programming-Tools
/
CodeBank.exe
/
RCDATA
/
SCRIPT
Wrap
Text File
|
1999-02-06
|
923b
|
109 lines
MAIN
{
Dialog MAINDLG
}
MAINDLG:INIT
{
SetText $104,"%%D"
}
MAINDLG:$101
{
SetPath $104
SetText $113,"Extracting"
Mask "*.*"
Disable $101
Disable $102
Disable $103
Extract $114
EndDialog
}
MAINDLG:$102
{
Exit
}
MAINDLG:$103
{
BrowsePath "Select destination folder"
SetText $104,"%%D"
}
ASKVOLUME:INIT
{
SetText $104,"%%A"
}
ASKVOLUME:$101
{
SetArcName $104
EndDialog
}
ASKVOLUME:$102
{
Exit
}
ERRARCHIVE:INIT
{
SetText $113,"%%A"
}
ERRARCHIVE:$101
{
EndDialog
}
ERRARCHIVE:$102
{
Exit
}
ERRCREATE:INIT
{
SetText $113,"%%D%%F"
}
ERRCREATE:$101
{
EndDialog
}
ERRCREATE:$102
{
Exit
}
ERRCRC:INIT
{
SetText $113,"%%F"
}
ERRCRC:$101
{
EndDialog
}
ERRCRC:$102
{
Exit
}
ERRWRITE:$101
{
EndDialog
}
ERRWRITE:$102
{
Exit
}
ERRMEMORY:$101
{
Exit
}